home *** CD-ROM | disk | FTP | other *** search
- object FSpeedTest: TFSpeedTest
- Left = 205
- Top = 119
- BorderStyle = bsDialog
- Caption = 'Speed Test'
- ClientHeight = 275
- ClientWidth = 368
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object LcTime: TLabel
- Left = 132
- Top = 226
- Width = 78
- Height = 13
- Caption = 'Calculation Time'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object LtheTime: TLabel
- Left = 277
- Top = 226
- Width = 6
- Height = 13
- Alignment = taRightJustify
- Caption = '0'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Lsec: TLabel
- Left = 292
- Top = 226
- Width = 17
- Height = 13
- Alignment = taRightJustify
- Caption = 'sec'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object LcTime0: TLabel
- Left = 132
- Top = 210
- Width = 106
- Height = 13
- Caption = 'sbParser-CreationTime'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object LtheTime0: TLabel
- Left = 277
- Top = 210
- Width = 6
- Height = 13
- Alignment = taRightJustify
- Caption = '0'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Lsec0: TLabel
- Left = 292
- Top = 210
- Width = 17
- Height = 13
- Alignment = taRightJustify
- Caption = 'sec'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object GBSpeedTest: TGroupBox
- Left = 8
- Top = 8
- Width = 353
- Height = 169
- Caption = 'Options'
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Serif'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- TabOrder = 0
- object PFTop: TPanel
- Left = 2
- Top = 18
- Width = 349
- Height = 39
- Align = alTop
- BevelOuter = bvNone
- ParentColor = True
- TabOrder = 0
- object LInfo: TLabel
- Left = 5
- Top = 8
- Width = 262
- Height = 13
- Caption = 'Info: Calculates f(x,y,z,u,v,w) ... times and adds them up'
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- end
- object PILeft: TPanel
- Left = 2
- Top = 57
- Width = 83
- Height = 77
- Align = alLeft
- BevelOuter = bvNone
- ParentColor = True
- TabOrder = 1
- object LFunction: TLabel
- Left = 5
- Top = 3
- Width = 65
- Height = 13
- Caption = 'f(x,y,z,u,v,w)='
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- end
- object MFunction: TMemo
- Left = 85
- Top = 57
- Width = 251
- Height = 77
- Align = alClient
- Color = clBtnFace
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Lines.Strings = (
- '')
- ParentFont = False
- ReadOnly = True
- ScrollBars = ssVertical
- TabOrder = 2
- end
- object PFBottom: TPanel
- Left = 2
- Top = 134
- Width = 349
- Height = 33
- Align = alBottom
- BevelOuter = bvNone
- ParentColor = True
- TabOrder = 4
- object LHowOften: TLabel
- Left = 5
- Top = 12
- Width = 55
- Height = 13
- Caption = 'How often?'
- Font.Charset = ANSI_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object LTimes: TLabel
- Left = 136
- Top = 12
- Width = 24
- Height = 13
- Caption = 'times'
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object UDTimes: TUpDown
- Left = 113
- Top = 8
- Width = 12
- Height = 21
- Associate = ETimes
- Min = 1
- Max = 30000
- Position = 1
- TabOrder = 0
- Thousands = False
- Wrap = False
- end
- object ETimes: TEdit
- Left = 80
- Top = 8
- Width = 33
- Height = 21
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MaxLength = 4
- ParentFont = False
- TabOrder = 1
- Text = '1'
- OnChange = ETimesChange
- end
- end
- object PFRight: TPanel
- Left = 336
- Top = 57
- Width = 15
- Height = 77
- Align = alRight
- BevelOuter = bvNone
- ParentColor = True
- TabOrder = 3
- end
- end
- object BStart: TButton
- Left = 32
- Top = 182
- Width = 86
- Height = 21
- Caption = '&Start'
- Default = True
- TabOrder = 1
- OnClick = BStartClick
- end
- object EResult: TEdit
- Left = 128
- Top = 182
- Width = 187
- Height = 21
- ParentColor = True
- ReadOnly = True
- TabOrder = 2
- end
- object BExit: TButton
- Left = 18
- Top = 244
- Width = 86
- Height = 24
- Caption = 'E&xit'
- TabOrder = 3
- OnClick = BExitClick
- end
- end
-